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AY REASON 


MEMORY EXCEEDED GENERATING 
PROGRAM 

GENERATION COMPLETE 

NOTE: UNDER MOS, THIS 
CONDITION IS SIGNALLED 
BY SUPERVISOR DISPLAY: 
41EF, END OF JOB 








END OF DIAGNOSTIC PHASE 
STERLING ERROR IN CON- 
TROL CARD 

NO CONTROL CARD 


STORAGE OR PRINT SIZE ERROR 
IN CONTROL CARD 

MEMORY EXCEEDED WHILE 
STORING SPECIFICATIONS 

END OF DIAGNOSTIC PHASE 


SUBROUTINE NOT DEFINED SY 
EX'T 

CARD COUNT ERROR IN SUB- 
ROUTINE CARDS OR RPG 
GENERATOR LOADING 

SUBROUTINE LABEL NOT DEFINED 
BY RLABL 

TABLE LENGTH DEFINED WRONG 
SUBROUTINE REQUIRED BY CALCU- 
LATIONS MISSING IN SOURCE DECK 


“GENERATION EXCEEDS MEMORY 


TOO FEW TABLE RECORDS 
TOO MANY TABLE RECORDS 


ERROR IN RPG DECK 
NO L CARD WHEN ONE IS. 
REQUIRED OR NO / (SLASH) 
CARD FOLLOWING THE 

L CARD 

CHANNEL NUMBER IN L 
CARD OVER 07 

H2 HALT WHILE RUNNING 


CARD TYPE OUT OF SEQ. — 
PRIMARY 

MR FIELD OUT OF SEQ. — PRIMARY 
RECORD UNIDENTIFIED — PRIMARY 
CARD TYPE OUT OF SEQ. — 
SECONDARY 1 Z 

MR FIELD OUT OF SEQ. — 
SECONDARY 1 

RECORD UNIDENTIFIED — 
SECONDARY 1 

CARD TYPE OUT OF SEQ. — 
SECONDARY 2 

MR FIELD OUT OF SEQ. — 
SECONDARY 2 

RECORD UNIDENTIFIED — 
SECONDARY 2 
¢1 RECORD UNIDENTIFIED 
€2 RECORD UNIDENTIFIED 


¢3 RECORD UNIDENTIFIED 
H1 HALT WHILE RUNNING DATA 


H1 & H2 HALT WHILE RUNNING 
DATA 

EOF CARD DETECTED 

DIVIDE ERROR EXECUTION IN 
OBJECT PROGRAM 

CARD COUNT ERROR DURING LOAD 


HOLE COUNT ERROR DURING 
LOADING 










ACTION 
REVISE INPUT & RERUN 





CARD RPG — HIT START TO RUN 
PROGRAM 


TAPE RPG 
NCOS — HIT RUN TO EXECUTE IF 
NO OBJECT-TIME TABLES 


REQUIRED OR KEY A NON- . 


ZERO LOCATION 4 — HIT 
START TO GO TO EO) 


PROGRAM TO RUN 
HIT START TO CONTINUE 
CORRECT ERROR — RERUN 


FEED OUT WAIT STATION CARD — 
REFEED LAST 2 CARDS PRECEEDED 
BY CONTROL CARD — HIT START 
SAME AS OD11 


REVISE INPUT & RERUN 


CANNOT CONT'NUE, CORRECT 
ERRORS — RERUN 
CORRECT ERROR — RERUN 


CORRECT ERROR — RERUN 


CORREC? ERROR — RERUN 


CORRECT ERROR — RERUN 
CORRECT ERROR — RERUN 


REDUCE MEMORY REQUIREMENTS — 
RERUN 

CORRECT ERROR RERUN 

CORRECT ERROR REFUN 


CORRECT ERROR — RERUN 
CORRECT ERROR — RERUN 


CORRECT ERROR - RERUN 


HIT START TO CONTINUE 





IF READER — HIT START 

TO BYPASS ERROR CARD — 
NEXT TO LAST CARO IN OUTPUT 
STACKER CAUSED ERROR 


iF 1001 OR READ PUNCH—CARD 
IN POST READ STATION CAUSED 
ERROR 


RE-POSITIONED CARD IN PRE-READ 
STATION WILL 8E NEXT CARD 
PROCESSED 


~ oe eae are 
CORRECT ERROR — RERUN 
CORRECT ERROR — RERUN 
CORRECT ERROR ~ RERUN 
HIT START TO CONTINUE 


HIT START TO CONTINUE 


RUN COMPLETED 
CORRECT ERROR & RERUN 


CHECK ERROR — HIT START TO 
RUN IF OK 

SEE 6180 ACTION (READER 
SOFTWARE) 


te READER ABNORMAL LIGHT IS OFF. 


9200 


9200 Il 
9300 
S300 II 


SYSTEMS 


REPORT 
PROGRAM 
GENERATOR 


REFERENCE 
CARD. 





25) 


18 17781920 


10; 








QPBIECT CPDE MuTPUT FILE ID (PzSC) 
TF NPT "RPG GUT PT" 


§D CHARACTERS 5+8 OF OBJECT PROGRAM (NCOS-COS ONLY) 


HEXADECIMAL ADDRESS FOR TOP OF MEMORY FOR THIS PROGRAM (USED 
FOR BUFFERED PRINTING) 


HEXADECIMAL STARTING ADDRESS FOR GENERATED PRO- 
GRAM. USED WITH NCOS AND Cos. 
BLANK — OBJECT PROGRAM BASE ADDRESS = RPG BASE 


ADD a 
DDRESS PUNCHES IN COL. 73-76 OF OBJECT DECK 
UP TO 4 CHARACTER I.D. OF OBJECT PROGRAM — OR ID FIELD ON TAPE 


IF USING NCOS C=1001 CONTROL STREAM INPUT 
BLANK = READER CONTROL INPUT 


RPG CONTROL CARD -- 


M = HARDWARE MULTIPLY, DIVIDE, EDIT ON O8JECT COMPUTER 
BLANK = SOFTWARE M/D/E 


48 = 48 CHAR. BAR,BLANK = 63 CHAR. BAR FOR TYPE OF PRINT BAR USED 
DURING GENERATION 


4O96=96, 120=120, 132=132 FOR NO. OF PRINT POSITIONS USED IN OBJECT PROGRAM 





BLANK ~ DECIMAL POINT NUMERIC LITERALS | = DECIMAL COMMA NUMERIC LITERALS 


PENCE OUTPUT FORMAT 1 = HOLLERITH BOTH BLANK = PENCE FORMAT| 
SHILLING OUTPUT FORMAT 2 = BSI BOTH 0 = PRINT ONLY 
PENCE INPUT FORMAT 11 =HOLLERITH BOTH BLANK = PENCE FORMAT 


SHILLING INPUT FORMAT 12 = BSI 


48 = 8K 12 = 12K 16 = 16K FOR STORAGE CAPACITY OF 
24= 24K 32 = 32K SYSTEM USED TO GENERATE & EXECUTE 


GLANK = GENERATE RPG LISTING B = DO NOT GENERATE LISTING 


BLANK = NO PUNCHING R= PUNCH OBJECT (ROW PUNCH) S= PUNCH OBJECT (SERIAL PUNCH) 
NCOS-R OR S=GENERATE OBJECT PROGRAM ON TAPE UNIT 1 
|| BLANK = GENERATE AND RUN 


D = RESERVE MEMORY FOR DISC ONLY MOS 
H@RPG CONTROL CARD IDENTIFICATION; MANDATORY ENTRY : 


“2 =2 TAPE CHANNELS AND PRINTER USED (MOS) 
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LABEL INFORMATION 


- EXPIRATION DATE 





LABEL INFORMATION 


- VOLUME NUMBER 








LABEL INFORMATION 


LABEL INFORMATION 


- GENERATION NUMBER 


- CREATION DATE 





LABEL !NFORMATION 


=- FILE {[DENTIFICATION 





SEVENTH CHANNEL NUMBER 





SEVENTH LINE NUMBER 





SIXTH CHANNEL NUMBER 





SUXTH LINE NUMBER 





FIFTH CHANNEL NUMBER 





FIFTH LINE NUMBER 





FOURTH CHANNEL NUMBER 








FOURTH LINE NUMBER 





THIRD CHANNEL NUMBER 








THIRD LINE NUMBER 





SECOND CHANNEL NUMBER 





SECOND LINE NUMBER 


FIRST CHANNEL NUMBER 


FIRST LINE NUMBER 





‘T L=LINE COUNTER SPECIFICATIONS CARD IDENTIFICATION, MANDATORY ENTRY 


LINE COUNTER SPECIFICATIONS 














N IF INDICATOR 
OFF CONDITION 
REQUIRED, 
BLANK IF 
OPPOSITE 


SECOND INDICATOR 


CONDITIONS THAT MUST 


BE MET TO PERFORM 


CALCULATIONS ENTERED 


FACTOR 
1 


ENTER THE FIELD 
NAME OR LITERAL 
TO BE USED IN THE 
CALCULATIONS. 
FIELO NAME MUST 
HAVE BEEN 
DEFINED ELSE- 
WHERE (LENGTH, 
ETC.). LEFT 
JUSTIFY ENTRY. 
FIELD NAME-6 
POS! TIONS,NUMERIC 
LITERALS—10 
POSITIONS OR 9 
PLUS SIGN, ALPHA- 


NUMERIC LITERALS- 


8 CHARACTERS 


EBCDIC ENCLOSED 


IN SINGLE QUOTES. 
HEXADECIMAL 
LITERALS 6 DIGIT 
ENCLOSED IN 
SINGLE QUOTES & 
PRECEDED BY X 


cOLS. 7 TO 17 IF THESE COLUMNS ARELEFT 
BLANK, THE CALCULATIONS 
SPECIFIED WILL BE EXECUTED 
FOR EVERY DETAIL RECORD 


CALCULATION 


eg Ad le Fed PE ob st | 


DECIMAL 
POSITIONS 


ENTER THE FIELD 
NAME OR LITERAL 
TO BE USED IN THE 
CALCULATIONS, 
FOLLOWS THE 
SAME RULES AS 
FACTOR 1 IN 
COLUMNS 18-27. 


COMMENTS 


ENTER COMMENTS CONCERN-= 
ING CALCULATIONSHERE, 


ENTER LENGTH OF RESULT FIELD, ENTER ONLY ONCE FOR EACH 


RESULT FIELD NAME.MAX. LENGTH NUMERIC FIELD #8, ALPHA 
FIELD 256. 





SPECIFICATIONS 








Rd 





LCP Phebe rb Rett th Crk hehe ae Cr Cre hha tai 


ail LI is! 
CHAINING 
FIELD NUMBER 


TO 
FILE NAME 


ANY COMMENTS CONCERNING 
WITH TABLES MAY BE EN TERED HERE. 
ALTER. NOTE: TABLE NAMES THAT ARE TO 
NATING Oentaing BE REFERENCED BY A SUBROUTINE 
FORMAT. TO THE BY AN RLABL STATEMENT MUST BE 
ENTER TABLE | RESTRICTED TO 4 CHARACTERS. TAB FOLLOWED 
enie NAME OF SPECIFIED BY ONE LETTER OR NUMBER.(TABX) 
NTER THE s 
- - NAME OF THE PERTAINING tram 
FILE TO WHICH THE TABLE 1S TO BE WRITTEN OR THE TO THE 2ND 
INAME OF CHAINED OR TAG-REFERENCED FILE. ENTRY OF 
ANY FILENAME MAY BE USED THAT HAS BEEN DEFINED : THE INPUT 
ON THE FILE DESCRIPTION SPEC. FORM 


RECORD. TAB FOLLOWED BY ONE TO THREE LETTERS OR NUMBERS 
ING TO THE ISTENTRY OF THE (TABXXX) 


IS. 
DO BY ONE TO. THREE LETTERS OR 


ENTER NUMBER OF ENTRIES IN ONE INPUT RECORD PERTAINING TO THE : = i ~~ Ee 
TABLE SPECIFIED IN COLS 27-32. RIGHT JUSTIFY ENTRY, : BLANK=NOT CHECKED, ATASCENDING, DIDES¢ 


N THE TAB be SPECIFIED IN COLS 27~32. RIGHT 





IF NUMERIC TABLE-ENTER 0-3 FOR NUMBER OF DECIMAL POSITIONS. 


@ | ENTER LENGTH OF ONE ENTRY OF TABLE SPECIFIED IN COLS 27—32. MAX: ALPHA 
EN TRIES-80, NUMERIC~15 





ENTER PIF TABLE IS 1N PACKED FORMAT 


FILE EXTENSION SPECIFICATIONS 








rLyrri dy 
35) 40 
FILE ORGANIZATION 


EXTENSION LABELS ADDITION 


LOGICAL 
DEVICE UNIT 


NUMBER: 


FORMAT. 
COMMENTS 
COMMENTS 


= 
bd 


32 


ENTER NAME [ENTER THE 
OF DEVICE LOGICAL 


ASSOCIATED NUMBER OF 
WITH THE THE P10. BLANK iF UNLABELED, N 


FILE NAME UNIT ASSO-]1F NONSTANDARD, SIF 
IN COL'S 7-14 CEATED STANDARD, AN OUTPUT 


: ENTER RECORD LENGTH 
ENTER NAME ASSIGNED TO [- : (LARGEST RECORD) RIGHT [- 
1/0 FILE — LEFT JUSTIFIED | | | JUSTIFIED, IF FIXED RECORD-|~ 
NO BLANKS OR SPECIAL ae ENTER RECORD LENGTH, 1° 
See AS Dees PTE LEFT. BLANK-RECORD SIZE i | Oe Vice NAMES| WITH THE] FILE MAY NOT HAVE 
Coe ee ee ee eel E : GF 80. ASSUMED : CCPRI,CCSEC, PFILENAME. [NONSTANDARD LABEL 
SA CEST ua ee eee Ip : : Je] READER "‘PRIGHT JUSTIFY ENTRY. FOR INDEXED 
PUNCH. cRP, |SEQUENTIAL FILE, ENTER LU NUMBER 
ENTER BLOCK LENGTH — RIGHT “4 ROWPNCH, ‘FOR VOLUME 1, ENTER LU NUMBER FOR 
: e See JUSTIFY ENTRY — FIXED BLOCK- “4 RRP, PRINT63 SUCCEEDING VOLUMES AS FOLLOWS: 
TIF TABLE, PIF PRIMARY, SIF ENTER BLOCK LENGTH, VARIABLE |_| PRINT 16, x VOLUME 3 COLUMNS | 
SECONDARY, RIF RA OR TAG,C fF BLOCK-ENTER LARGEST BLOCK | PRIN T48 é $4, 85 
(F CHAINED — MUST BE USED LENGTH, IF LEFT BLANK-BLOCK SIZE TAPE, TAPE7,[- 56,87 
WHEN FILE TYPES | & C ARE OF 80 ASSUMED, ANY SIZE MAY BE DISC. NAME 68,55 
SPECIFIED RCANK ON OUTPUT ENTERED FROM 18 TO 4095 (DISC: 160 MAX) MUST BE LEFT 60.61 
FILES ; : JUSTIFIED 62.63 


64, 86 - 
DS; Var a EEEeeeem 
vhMinee TARE Segoe E SPECIFIES THAT THIS FILE HAS FURTHER oun NEw REC ores 
INFORMATION. ON FORM TYPE E. L SPECIFIES THAT. A AS SIDE ED 
ENTER A OR DIF MATCHING RECORDS. A ALINE COUNTER SPECIFICATION CARD 18 PRESENT SEQUENTIAL FILE 
IF ASCENDING, D 1S DESCENDING (BUFFERED PRINTING) . 


FILE DESCRIPTION 









































\sl 


OPTION 


RECORD 
NUMBER 


DATA 
INDICATOR FORMAT POSITIONS 


ea IDENTIFICATION CODES 


POSITION 
“ne 


STERLING 
SIGN 
POSITION 


POSITION 


POSITION |) 


USE WHEN PROCES 
SING STERLING 


CURRENCY AMOUNTS| 
SEE APPENDIX D. 

|] TAPE RPG MANUAL 
(UP=7510) BEFORE 
USING THESE 
COLUMNS 


INDIC Ae 
TOR TO 
BE SET 
ON FOR 
VALUES 
OF A NU- 
MERC 
FIELD 
GREATER 
THAN 
ZEROY 
BLANK 
FOR 
ALPHA 
FIELDS. 





44-516 NO 
BLANKS OR 
SPECIAL 
CHARAC- 
TERS. 

FIRST CHAR: 


DESCRIPTION 
OF SECOND 
CODE TOBE | 
TESTED (FOL-. 


START WITH 01 TO CHECK CON- 
TROL GROUP SEQUENCE WITHIN 
A FILE, ALPHA FOR NO CHECK — 
ALPHA MUST APPEAR FIRST 


ECORD PER GROUP, 
hey _ ENC 


PACKED DECIMAL, 
BLANKIF NOT 


1F TWO 

POSI- 

TIONS ARE TOBE : 

TESTED FOR IDENTI- j VENTER 2 

FYING CODES, ENTER i i 

SECOND POSITION DESCRIPTION OF THIRD 

cee TO BE ENTRY HERE. eee inet aha cee mutes 

GORD TYPE (DEN TI Wile 

DENTIFYING CODE 1s. PAS COLS. 28-27) 


“iF NUMERIC FIELD:0~9 FOR 
DECIMAL POSITIONS, ALPHA 
LEAVE BLANK 


{WHEN DESIRED TO 
SELECT CARDS READ 
UN READ/PUNCH 


SJENTER INDICATOR TO SE 
SET ON FOR VALUES OF A 
NUMERIC FIELD LESS THAN 
ZERO.(X PUNCH IN UNITS 
POSITION} BLANK FOR ALPHA 
FIELDS 


ENTERO IF RECORD OPTIONALIN 
GROUP, BLANK IF REQUIRED 


TO INDICATE 
CON TROL 
LEVEL OF 
FIELD DE- 
FINED— 
FIELD CAN- 
NOT BE IN 
PACKED 
FORMAT 


SAME FIELD IN DIFFERENT COLS OF "*OR** 
RECORDS 


ENTER M1 TO MB TO INDICAT 
FLELDS IN PRIMARY & SECO 


ENTER CARD COLUMN ORTAPE POSITION THAT TO TEST ZONE, 
CONTAINS THE IDENTIFYING CODE FOR ASPECIFIC Zest DIGIT, ¢ TA 
RECORD TYPE. RIGHT JUSTIFY ENTRY, ENTRY ENTIRE COLUMN 
MUST BE NUMERIC = pga 
NOLF CODE MUST NOT BE PRE. 


SENT, BLANK OF OPPOSITE C1 TO C38 TO INDICATE CHA t 


ee 


| sl 1 


TYPE STACKER 
H/0/T SELECT /PRINT OPTION 





bol 


ZERO 
SUPPRESS FORMAT 
END 

POSITION. CONSTANT OR EDIT woRD 
rie SIGN 
OUTRUT = POSITION 
RECORD ; 
Og eh ™ 


STERLING 


EN TER ANY CONSTANTS TO BE -OUTPUTTED OR EN | 
EDIT. WORDS FOR:-AMOUNT: FIELDS. LEFT JUSTIFIE AL 
ENTRIES, ALPHA CONSTANTS UP TO 24 CHARACTERS, 
HEXADECIMAL CONSTANTS UP TO 22: CHARACTERS. 
BOTH-TY PES 
CLOSED IN 


DECIMAL. Bi REC St 


NAME OF 
FIELD TO 
BE PRINTED 
CAN BE ANY 
NAME FROM 
INPUT OR 
CALCU- 
LATIONS 
SHEET. 
LEFT 


USED WHEN PRO. 
CESSING STERLING 
CURRENCY 
AMOUNTS."S"INCOL, 
J4INDICATES 
STERLING OUTPUT 
SEE APPENDIX D, 


PF OUTPUT FIELD IS TOBE IN 
PACKED FORMAT 


ENTER THE POSITIGN: NUMBER OF THE OU T- 
PUT-RECORDWHERE THE RIGHTMOST = 
CHARACTER OF THE FIELDIS TO APPEAR 


H IFHEADING, DIF DETAIL, T 


JUSTIFY 
ENTRY, NO 
BLANKS OR 


BLE Fie Lore Wee RESET TO BLANK ORO 


AFTER PRINTIN 


TERS ARE RE: 


TAPE RPG MANUAL 
(UP-7510) BEFORE 


ZTO SUPPRESS LEADING ZEROS « LEAST SIG- 


THESE COLUMNS, 
NEBLC ANT ZONE 


SPECIAL 
CHAR, 
FIRST CHAR. MUST BE ALPHA. USE "*PAGE'"’ TO PRINT PAGE 
NUMBERING. 


PLACED BY DIG 
tF TOTAL 4 ‘ 


iF THREE INDICA TOR.CONDITIONS MUST BE MET.TO PERFORM 
OUTPUT DESCRIBED, ENTER THIRDINDICA TOR HERE. 


01 TO 07 FOR SKIPPING TO CHANNEL 


PRESSED UN Ti 
POSITION BEFORE PRINTING 


DIGLT- IN FIE LI Be 
IF TWO INDICATOR CONDITIONS MUST BE MET TOPERFORM OUTPUT 


DESCRIBED, ENTER SECOND INDICATOR HERE. 


NNEL POSETION 7 SIGN, STATUS POR 


1S NEGATIVE, 8° 
PLACED By 
TIVE CHARACTE! 


ENTER INDICATOR WHOSE CONDITIONS MUST BE MET To PERFORM OUTPUT 
. ARE PRINTE! 


N IF INDICATOR OFF REQUIRED, BLANKIF DESCALBED ON. THIS CIN &, 


OPPOSITE 





*ENTER ADD IN COLUMNS 16—18 IF DATA IS TO BE ADDED TO AN INDEXED SEQUENTIAL FILE. 


OUTPUT FORMAT SPECIFICATIONS 
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